fmaxw_ext Function

public function fmaxw_ext(v, alfa2, dfmaxw)

$$alfa = \sqrt{alfa_2}$$ $$api = 2 \cdot alfa \cdot \exp({-\frac{1}{4 alfa_2}})$$ $$b = 2 - erf(0.5/alfa) + api$$ $$f = psiq(v, alfa_2)$$ $$fmaxw = \frac{f+api}{b \sqrt{2\pi}}$$

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp)				::	v
real(kind=wp)				::	alfa2
real(kind=wp)				::	dfmaxw

Return Value real(kind=wp)